FILENAME REFFILE '/folders/myfolders/DPR.csv';

PROC IMPORT DATAFILE=REFFILE DBMS=csv OUT=WORK.date replace;
RUN;



data date;
	set date;
	label dpr='Divident Payout Ratio';
run;


proc univariate data=date;
	var DPR;
	histogram;

run;



proc hpseverity data=date plots(histogram kernel)=all
           outest=parmest  OUTSTAT=outstat outmodelinfo=modelinfo;

	loss dpr;
	dist gamma tweedie _all_;
	nloptions tech=quanew ;
run;

proc sort data=date; by country;
proc hpseverity data=date plots=none noprint
              outest=parmest  OUTSTAT=outstat outmodelinfo=modelinfo;
by country;
	loss dpr;
	dist gamma tweedie _all_;
	nloptions tech=quanew ;
run;






   

